
Partial Class Default2
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Try
            If Not Page.IsPostBack Then
                TextBox1.Text = Request.Params("valor")
            Else
                Dim strpage As String = "General_Fin_W.aspx"
                Dim paramFinal As String = "modo=modificacion&datos=".ToString + TextBox1.Text
                strpage += "?".ToString + paramFinal.ToString 'General_Fin_W.aspx?modo=modificacion&datos=
                Response.Redirect(strpage)
            End If
        Catch ex As Exception
            Response.Write(ex.Message)
        End Try
    End Sub
End Class
